perm filename FOO.SAI[DOC,TOB] blob sn#234932 filedate 1976-09-01 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	BEGIN "TEST"
C00003 ENDMK
CāŠ—;
BEGIN "TEST"
INTEGER ARRAY A[1:2];
PROCEDURE B(INTEGER ARRAY A1);
BEGIN
A1[1]←1;
END;
B(A);
END "TEST";